home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / Runimage / Delphi50 / Source / Property Editors / stredit.dfm < prev    next >
Text File  |  1999-08-11  |  3KB  |  117 lines
  1. object StrEditDlg: TStrEditDlg
  2.   Left = 226
  3.   Top = 123
  4.   BorderStyle = bsDialog
  5.   Caption = 'String List editor'
  6.   ClientHeight = 279
  7.   ClientWidth = 430
  8.   Color = clBtnFace
  9.   ParentFont = True
  10.   OldCreateOrder = True
  11.   PopupMenu = StringEditorMenu
  12.   Position = poScreenCenter
  13.   OnCreate = FormCreate
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Bevel1: TBevel
  17.     Left = 8
  18.     Top = 8
  19.     Width = 413
  20.     Height = 229
  21.     Shape = bsFrame
  22.   end
  23.   object LineCount: TLabel
  24.     Left = 12
  25.     Top = 12
  26.     Width = 169
  27.     Height = 17
  28.     AutoSize = False
  29.     Caption = '0 lines'
  30.   end
  31.   object CodeWndBtn: TButton
  32.     Left = 8
  33.     Top = 248
  34.     Width = 75
  35.     Height = 25
  36.     Caption = '&Code Editor...'
  37.     ModalResult = 6
  38.     TabOrder = 1
  39.     OnClick = CodeWndBtnClick
  40.   end
  41.   object HelpButton: TButton
  42.     Left = 345
  43.     Top = 248
  44.     Width = 75
  45.     Height = 25
  46.     Caption = '&Help'
  47.     TabOrder = 4
  48.     OnClick = HelpButtonClick
  49.   end
  50.   object OKButton: TButton
  51.     Left = 185
  52.     Top = 248
  53.     Width = 75
  54.     Height = 25
  55.     Caption = '&OK'
  56.     Default = True
  57.     ModalResult = 1
  58.     TabOrder = 2
  59.   end
  60.   object CancelButton: TButton
  61.     Left = 265
  62.     Top = 248
  63.     Width = 75
  64.     Height = 25
  65.     Cancel = True
  66.     Caption = 'Cancel'
  67.     ModalResult = 2
  68.     TabOrder = 3
  69.   end
  70.   object Memo: TRichEdit
  71.     Left = 16
  72.     Top = 31
  73.     Width = 397
  74.     Height = 197
  75.     HideScrollBars = False
  76.     PlainText = True
  77.     ScrollBars = ssBoth
  78.     TabOrder = 0
  79.     WordWrap = False
  80.     OnChange = UpdateStatus
  81.     OnKeyDown = Memo1KeyDown
  82.   end
  83.   object OpenDialog: TOpenDialog
  84.     DefaultExt = 'TXT'
  85.     Filter = 
  86.       'Text files (*.TXT)|*.TXT|Config files (*.SYS;*.INI)|*.SYS;*.INI|' +
  87.       'Batch files (*.BAT)|*.BAT|All files (*.*)|*.*'
  88.     Options = [ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist, ofEnableSizing]
  89.     Title = 'Load string list'
  90.     Left = 376
  91.   end
  92.   object SaveDialog: TSaveDialog
  93.     Filter = 
  94.       'Text files (*.TXT)|*.TXT|Config files (*.SYS;*.INI)|*.SYS;*.INI|' +
  95.       'Batch files (*.BAT)|*.BAT|All files (*.*)|*.*'
  96.     Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp, ofPathMustExist, ofEnableSizing]
  97.     Title = 'Save string list'
  98.     Left = 404
  99.   end
  100.   object StringEditorMenu: TPopupMenu
  101.     Left = 344
  102.     object LoadItem: TMenuItem
  103.       Caption = '&Load...'
  104.       OnClick = FileOpen
  105.     end
  106.     object SaveItem: TMenuItem
  107.       Caption = '&Save...'
  108.       OnClick = FileSave
  109.     end
  110.     object CodeEditorItem: TMenuItem
  111.       Caption = '&Code Editor...'
  112.       Visible = False
  113.       OnClick = CodeWndBtnClick
  114.     end
  115.   end
  116. end
  117.